
DATA GENERAL 
CORPORATION 

South boro, 

Massachusetts 01772 
(817)485-9100 



PROGRAM 

Single Precision Signed Divide 
TAPES 
ASCII source: 090-000014 

ABSTRACT 

This routine divides a double precision, two's complement, 
fixed point number by a single precision, two's complement, 
fixed point number. The result is a single precision, two's 
complement quotient and a single precision, two's complement 

remainder. 
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1. REQUIREMENTS 

1. 1 Memory 

IK or larger alterable memory 

1.2 Equipment 

NOVA central processor 

1.3 External Subroutines 
Unsigned divide ( .DIVU) 

1.4 Other 
None 

2. OPERATING PROCEDURE 

2-1 Calling Sequence 

JSR .DIV 
return 

2.2 Input Format 

Dividend in AC£f (high order) and AC1 (low order) 
Divisor in AC2. 

2.3 Output Format 

Quotient in AC1. Remainder in AC0 (same sign as 
dividend) . 

2.4 Error Returns 

An error results if the magnitude of the quotient 
exceeds 2**15-1. In this case, Carry will be set 
and no division takes place. If the division is 
correctly executed, Carry will be zero. 
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2.5 State of Active Registers upon Exit 

AC0, AC1, AC 3, and Carry are destroyed. 
AC2 remains unchanged, 

2. 6 Cautions to User 
None 

3. DISCUSSION 

3. 1 Algorithms 

The .DIV routine remembers the signs of the dividend 
and divisor and calls the unsigned divide routine using 
the absolute values of the operands. If either the 
unsigned divide routine indicates an error, or the 
quotient exceeds 2**15-1, Carry is set, the ACs 
restored, and control is returned. Otherwise, the 
signs of the results are determined from the operand 
signs. The remainder is the same sign as the dividend. 
The quotient is signed according to the algebraic 
rules for division. 

3.2 Limitations and Accuracy 
The routine is exact. 

3. 3 Si2e and Timing 

The routine requires 45 (octal) words of storage 
in addition to the unsigned divide routine. 

Average execution! time is approximately 122 ju 
seconds in addition to the unsigned divide time. 
The average time for an unsigned divide is 
approximately 483 ju seconds for a total average 
execution time of 605 ju seconds. 

3.4 References 

See write-up 093-000016 for a description of the 
unsigned divide routine. 
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3.5 Flov; Diagrams 
Ncne 

4 - EXAMPLES AND APPLICATIONS 

5 « RMQGmu LISTING 



A listing of .div follows. No origin is used in the source, 
enabling the user to edit the routine anywhere into his 

program. 



SIGNED DIV1JS 

DIVIDES TWO FIXED POINT* TWO'S COMPLEMENT NUMBERS 



INPUT* 

OUTPUT! 



NI IN AC0 AND ACS C'ilGH AND LOW* M2 IN 
AC2 

NI/N2 I REMAINDER IN AC0 (SAME SIGN AS 
DIVIDEND) 
QUOTIENT IN ACt 



CALLING SEQUENCE 

JSR .D-V 

return 



DESTROYED! 
UNCHANGED* 



AC0# AC1* AC'3* CARRY 
AC2 



EXCEPTIONAL CONDITION! IF THE MAGNITUDE OF THE 

QUOTIENT EXCEEDS 
2**15-1* CARRY IS SET AND 
THE DIVIDEND REMAINS UNCHANGED 
OTHERWISE* CARRY WILL BE 







I REQUIRES! .DI 


03300 


084043 


• DIV: 


STA 3*.AC03. 


0-3001 


053041 




STA 2#.AC02 


3000a 


044040 




STA W.AC01 


00903 


040337 




STA 0#.AC00 


0000 4 


155102 




M3VL 2»3*S2C 


00005 


150400 




MEG 2*2 


03006 


176560 




SU8CL 3*3 


00037 


175120 




MOV2L 3*3 


00310 


101113 




M0VL# 0*0* SNC 


0001 1 


000016 




J.MP -AC99 


00012 


175430 




INC 3*3 


00013 


12440 4 




NE6 1*1*32R 


00014 


10000! 




COM 0*0* SKP 


00015 


100400 




NEG 0*0 


00016 


054043 


•AC99S 


STA 3*«AC10 


0001? 


006044 




JSR f*AC30 


00023 


030041 




LDA 2#.ftC82 


00021 


125103 




MOVL 1*1*SNC 



00022 125202 

00023 000034 

00024 034043 



MOVR 1* t*SZC 

JMP *AC98 
LDA 3* » AC 10 



(UNSIGNED DIVIDE) 



SAVE RETURN 
SAVE DIVISOR 
SAVE DIVIDEND 

CHECK SIGN OF DIVISOR 

FORM ABSOLUTE VALUE 

SAVE SIGN OF DIVISOR IN AC3 

POSITION IN BIT 14 

TEST SIGN OF DIVIDEND 

POSITIVE* BIT 15 OF AC3 

CONTAINS SIGN Of DIVIDEND 

SIGN OF DIVIDEND TO 

AC3 BIT 15 

FORM A85. VALUE OF DIVIDEND 



FLAG WORD FOR SIGNS OF 

REMAINDER AND QUOTIENT 

CALL .DIVI (UNSIGNED DIVIDE) 

RESTORE AC2 

IF SIGN BIT SET. 

QUOTIENT CAN'T \ 

BE REPRESENTED IN 16 SITS 

IF CARRY SET* -DIVU GAVE 

ERROR RETURN / 

ERROR* RETURN WITH CARRY SET 

GET FLAG WORD 



f 1 1 



AC3 CONTAINS 
THESE AREs 



FOUR POSSI8LE COMBINATIONS 
m § 'POSITIVE* R POSITIVE 
01 9 NEGATIVE* R NEGATIVE 
1§ Q NEGATIVE* R POSITIVE 

II Q POSITIVE* R NEGATIVE 



mms 


175233 


00026 


174001 


§0827 


180400 


00030 


175203 


00031 


124400 


00832 


175023 


00033 


002042 



00034 020037 «AC98s 

00035 024040 

00036 002042 



mm 3#3#snc 


I 


TEST REMAINDER SIGN 


COM 3*3*SKP 


1 


POSITIVE 


NE6 0»i 


3 


REMAINDER IS NEGATIV 


WOVR 3*3#SNC 


I 


TEST QUOTIENT SIGN 


NE6 1*1 


I 


QUOTIENT IS NEGATIVE 


MOVE 3*3 


1 


CLEAR CARRY 


JMP §«AC03 


1 


RETURN 


LDA 0#.AC30 


I. 


DIVIDE ERROR 


LDA f*.AC8l 


# 


RESTORE DIVIDEND 


JMP 9.AC03 


1 


RETURN* CARRY IS SET 



00037 000000 .AC00I 

00040 000000 .AC011 

000541 000000 •AC02S 

00042 000000 *AC03s 



J SAVE DIVIDEND 

I SAVE DIVIDEND 

% SAVE AC2 

J SAVE AC 3 



00043 000S00 .AC10S 



, SIGN OF QUOTIENT AND 

I REMAINDER FLAG WORD 



00044 080044 .AC30I .DIVU 



I UNSIGNED INTEGER DIVIDE 

I ROUTINE ADDRESS 



